home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 12 / Cream of the Crop 12 (Part II) / Cream of the Crop 12 (Part II).iso / BBS / PB201SW.ZIP / SYSC.LZH / SC
Encoding:
Text File  |  1996-02-11  |  777 b   |  26 lines
  1. SYS3CTLfappendto(badnames.bbs,%name%)
  2. setequal(/pass=TWIT, was /:pass/)
  3. log(--,%name% locked out)
  4. quitbbs
  5. SYS6CTL$ loadmem(control\macros\mchat.ctl)
  6. SYS7CTL#loadmem(control\macros\stats.ctl)
  7. SYS4CTL"loadmem(control\macros\page.ctl)
  8. SYS1CTL!loadmem(control\macros\bye.ctl)
  9. SYS5CTLloadmem(control\main.mnu)
  10.  
  11. -68CTLSlog(<<,Sysop disconnected BBS user [F10])
  12. LoadSub(control\mnchat\quit.)
  13. quitbbs
  14.  
  15. -31CTL1setnv(nobad=1)
  16. loadmem(control\macros\ssc.ctl)
  17.  
  18. -65CTL6setnv(nobad=1)
  19. loadmem(control\macros\linechat.ctl)
  20.  
  21. -66CTLxdisplay(display\cutoff)
  22. log(<<,Sysop disconnected BBS user [F8])
  23. LoadSub(control\mnchat\quit.)
  24. secpause(1)
  25. quitbbs
  26. SYS2CTL?loadsub(control\macros\reseta.ctl)
  27. loadmem(control\open.ctl)
  28. 4CTL(LoadSub(control\mnchat\quit.)
  29. dropdos
  30.